home *** CD-ROM | disk | FTP | other *** search
/ Champak 132 (Alt) / Vol 132.iso / games / 3d_hyper / 3d_hyper.dcr / Scripts_56.ls < prev    next >
Encoding:
Text File  |  2011-06-09  |  555 b   |  24 lines
  1. on getPrintTime theTime
  2.   if theTime = 0 then
  3.     theString = "--:--:---"
  4.   else
  5.     mins = theTime / 60000
  6.     secs = (theTime - (mins * 60000)) / 1000
  7.     thous = theTime mod 1000
  8.     mins = string(mins)
  9.     secs = string(secs)
  10.     thous = string(thous)
  11.     repeat while mins.length < 2
  12.       mins = "0" & mins
  13.     end repeat
  14.     repeat while secs.length < 2
  15.       secs = "0" & secs
  16.     end repeat
  17.     repeat while thous.length < 3
  18.       thous = "0" & thous
  19.     end repeat
  20.     theString = mins & ":" & secs & ":" & thous
  21.   end if
  22.   return theString
  23. end
  24.